' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-( @Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠dz# du`z#     ԠǠϠŠԠĠ֠ϠŠԠĠĠӠΠԠ Π ԠԠ$ " 1. SPEED UNITS CONVERSION"D " 2. TIME DISTANCE SPEEDX $" 3. ROCKET"d ." 4."p 8" 5." B" 6. TIME DISTANCE SPEED (ADVANCED)" L" 7." V" 8." `" 9." j" 10." t" 11." ~" 12." " 13." " 14." " D$"RUN CANNON"( D$"RUN ORBIT"I D$"RUN TIME DIST SPEED ADV" JD$"CATALOG"::"PRESS RETURN TO CONTINUE";AA$:130 T  4 " PHYSICS MENU -- B. H. S."  " R. McClelland" " Instructor" 7 d HELLOn*xD$(4):CONTROL-D:1000:MENUGN6260ZN13N3ī130mN1N12ī130N210,220,230,240,250,260,270,280,290,300,310,320,330,340D$"RUN SPEED UNITS CONVERSION"D$"RUN TIME DIST SPEED" D$"RUN ROCKET  *********************1 * *M * TIME DIST SPEED *i * * * BY R MCCLELLAND * * 9 - 18 - 83 * * * **********************INUE LISTING FOR"+ "MORE TIMES? Y/N "1 9 Z$I Z$"Y"100u :"WOULD YOU LIKE TO RUN ANOTHER SET " "OF NUMBERS? Y/N" Z$ Z$"Y"30 :D$"RUN HELLO" JL01:L(J),255:L(J)1,255:J 61800,61970: *E (DELTA T):"; PDT ZT0$ _H d"TIME","DISTANCE";33);"SPEED"U xITT9i |DT(.5ATVI) ~DR(1000D.5)1000 VATVI VR(1000V.5)1000 TR(1000T.5)1000 TR,DR,VR TTDT  "DO YOU WISH TO CONT  :5!D$(4):CONTROL-DH"THIS PROGRAM WILL CALCULATE THE"t"POSITION AND SPEED OF AN OBJECT THAT""MOVES WITH CONSTANT ACCELERATION":"ENTER ACCELERATION: ";(A2:"ENTER INITIAL SPEED: ";<VI F:"CHANGE IN TIM   ********************/SEC F. KILOMETERS/HR"! N) OL$6 PL(L$)< WW *********************r * * * WRITTEN BY * * ROBERT MCCLELLAND * * BEATRICE, NE. * * 1985 * * * *YOUR VALUE (A NUMBER LIKE 3.1)"% G "THEN PRESS THE RETURN KEY."M &S + 0"THEN SELECT THE UNITS FOR YOUR VALUE BY PRESSING LETTER IN LIST." : D"A. MILES/HOUR D. METERS/SEC" F"B. FEET/SEC E. CM/SEC" H"C. MILES$ r:"PRESS ANY KEY TO CONTINUE "; |"OR 'S' TO STOP."C Z$I Y Z$"S"499b 100u D$"RUN HELLO" "THIS PROGRAM TAKES A SPEED IN YOUR CHOICE OF UNITS AND CONVERTS IT TO SEVERAL OTHER UNIT COMBINATIONS."  "ENTER LOWING ARE ALL THE SAME SPEED IN DIFFERENT UNITS"7 1W 6MS36001609;" MILES/HOUR"] ;{ @MS52801609;" FEET/SEC" E JMS1609;" MILES/SEC" O TMS;" METERS/SEC" Y ^MS100;" CM/SEC" c hMS3.6;" KILOMETERS/HOUR" n:diD$(4)n500#xV+z:4}560:@KNL64nN200,210,220,230,240,250,550MSV16093600300MSV16095280300MSV1609300MSV300MSV100300MSV3.61 ,"THE FOL     "PRESS RETURN KEY TO CONTINUE":Z$(._"****************************************";e"* * * *";"* *";********************* * A ACCELERATE "AH" BY 2 UNITS"GMqR" D ACCELERATE "W" BY -2 UNITS"\a" C COAST AT "f" CONSTANT SPEED""k: FLY YOUR ROCKET FROM"A 7" EARTH TO MARS, A DISTANCE OF 1000"i 9" UNITS, AS QUICKLY AS POSSIBLE," :" AND ARRIVE AT A SPEED OF LESS THAN" ;" 2 UNITS TO AVOID A CRASH." =: >"YOUR CONTROLS: KEY RESULT" ?C" 600 N4003 X:"DO YOU WANT TO TRY AGAIN?":Z$L bZ$"Y"Z$"YES"100_ lD$"RUN HELLO"e  7:" "; 7:3:TIME;:14:DIST;:25:FAST;:36:FUEL  15)"ROCKET" * 4"YOUR MISSION: TOMISSED! - TRY BACKING UP "l B(DIST1000)2FAST2FAST2M$"ARRIVED IN ORBIT ABOUT MARS ":FLAG1 CDIST1000FAST2M$"PERFECT LANDING -- GOOD JOB!":FLAG1 DFUEL1M$"FUEL GONE -- MISSION LOST ":FLAG1 E20:10:M$ IFLAG1DT A0FUELFUEL2! &700B 0DIST0M$"MISSION A OK "m 5FUEL50M$"FUEL OVER HALF GONE " :DIST750FAST30M$"CAUTION: CRASH POSSIBLE" ?DIST1000FASTFUELM$"MISSED! - YOU'RE LOST IN SPACE":600 @DIST1000FASTFUELM$"IME0 DIST0 "DT16 '20:10:"GO FOR LAUNCH"? ,700J FLAG0R Z$g Z$"A"A2:500} Z$"D"A2:500 Z$"C"A0:500 Z$"Q"600 410 VIFAST DIDIST FASTADTVI DISTDT(0.5ADTVI)DI TIMETIMEȬdD$(4):CONTROL-D!:31T$"21:30":800@Q15)"ROCKETW" ACCEL. = A DECEL = D"" COAST = C QUIT = Q"" TIME DIST SPEED FUEL"FUEL100FAST0 T     / "CHOOSE ONE OF THE ABOVE BY NUMBER: ";N5  D IN METERS AND SPEED IN METERS/SEC."*[(#"THANKS FOR TRYING CANNON! R. MCCLELLAND."j-#D$;"PR#0"}2#D$"RUN HELLO"<# DERT MCCLELLAND"\[f"TRIAL NO. SPEED ELEVATION RANGE MAXIMUM HEIGHT"fpK1Itz36,4:K;36,13:V(K);36,26:THETA(K);36,36:R(K);36,52:HMAX(K)36,0K$"ELEV. IN DEGREES, RANGE & HEIGHTAME (FIRST AND LAST)."'NAME$- _"ENTER CLASS PERIOD (1,2,3, ETC.): ";PERIODn D$;"PR#1"*"CODE: ";CODE$4>"CANNON DATA EXTRA CREDIT PHYSICS PROJECT"H"STUDENT: ";NAME$;" PERIOD: ";PERIODR"INSTRUCTOR: ROB34,0::490001"YOUR CHOICE ";Z$G$(Z$,1)"Y"2000X.Z$"N"9000b81010h"PLEASE CHECK THAT THE PRINTER IS ON AND THAT THE 'ON LINE' LIGHT ISALSO ON. IF YOU ARE NOT SURE GET HELP NOW.""PLEASE TYPE YOUR N ";I;" ";V(I)'V(I)9991000G"ENTER ELEVATION ";I;" ";UTHETA(I)dPI3.1416R(I)V(I)V(I)(PITHETA(I)90)9.8R(I)(10R(I))10HMAX(I)(V(I)(PITHETA(I)180))219.6HMAX(I)(10HMAX(I).5)10420 36,23:R(J);#36,33:HMAX(J)-036,04:J>DII1HN::VXI51650`]I50b"YOU HAVE COMPLETED 50 TRIALS AND THE PAGE IS FULL. PRESS RETURN TO CONTINUE."lZ$v1000"ENTER SPEED OF 999 TO STOP": "ENTER SPEED TO 90"/ T" SPEED SHOULD BE FROM 0 TO 500 "5 e "NO. SPEED ELEV. RANGE MAX HEIGHT" 34,9:TOP OF SCREEN TO LINE NINE I6450 M1  460 MI5  JMI " ";J; 36,8:V(J); 36,16:THETA(J);NY KEY TO CONTINE." ! Z$' ? ******************W * *o * INPUT TRIALS * * * ****************** ,I0 64 @"SUGGESTED STARTING VALUES: " J" ELEVATION SHOULD BE FROM 0SAVED WHILE THE PROGRAM IS RUNNING. AT THE END YOU CAN HAVE THEM PRINTED OR DESTROYED."^ "DEFINITION: 'RANGE' IS THE LEVEL OR HORIZONTAL DISTANCE FROM THE CANNON TO WHERE THE CANNON BALL HITS THE GROUND." 5);  "PRESS ANTER THE ANGLE OF ELEVATION (ELEV=0 IS HORIZONTAL OR LEVEL AND ELEV=90 IS STRAIGHT UP)."d "THEN ENTER THE STARTING SPEED OF THE CANNON BALL. (THE UNITS USED ARE METERS/SEC)" X "ALL YOUR TRIALS WILL BE * i* *3 j******************9 k? xJ |13);P }b ~" CANNON "j : "THIS PROGRAM ALLOWS YOU TO EXPERIMENT WITH A CANNON LIKE THOSE USED BY PIRATESOR THOSE USED DURING THE CIVIL WAR. " ^ "YOU SIMPLY E  ******************1* PHYSICS CANNON *I* 7-11-83 *a(* R MCCLELLAND *y2******************<FZD$(4)dTHETA(50),V(50),R(50),HMAX(50)ef******************g* * h* INSTRUCTIONS      "  XX$$ XX$"S"XX$"A"1100. 24508 1100> I FLAG0w" "RE-RUN PROGRAM OR MENU? PRESS R OR M", TT$6 TT$"R"TT$"M"2890@ 2850J TT$"R"ĉ:2050T D$(4)^ h r D$"RUN HELLO"****************** "YOU CAN HAVE THE ORBIT PLOTTED AUTO- MATICALLY OR STEP BY STEP AT EACH PRESS OF THE SPACE BAR."qt ~ "IF THIS IS THE FIRST TIME YOU HAVE RUN THE PROGRAM TRY AUTOMATIC FIRST."  FLAG0:QQ$"": RESET FLAGS " PRESS A OR S OU WANT THE ORBIT VALUES PRINTED? (THIS SHOULD BE EQUAL TO OR SOME MULTIPLE OF THE ABOVE INTERVAL OF ";DT;" DAYS ". "SUCH AS ";2DT;" DAYS OR ";4DT;" DAYS.)"8 B "PRINT-INTERVAL IN DAYS? ";TL TDTTDTV TDT(TDT)` :6kjED BY YOU. THE SHORTER THE TIME INTERVAL THE BETTER THE RESULTS, BUT THE LONGER IT TAKES."g"FOR THE PREVIOUS SUGGESTED VALUES AN INTERVAL OF 30 DAYS WOULD BE GOOD."  "INTERVAL IN DAYS? ";DT {$ "AT WHAT INTERVALS DO Y E.G. VX=0 AND VY=0.3""="ENTER VX,VY ";V1,V2QVXV16:VYV26Z:4"X= ";X0;" Y= ";Y0;" VX= ";V1;" VY= ";V2a"THE ORBIT IS CALCULATED BY REPEATING A SERIES OF FORMULAS OVER AND OVER FOR TIME INTERVALS SELECTA VELOCITYOF 1.414 AT A 45 DEG. SLANT TO THE UPPERLEFT.">"THE UNITS OF VELOCITY ARE IN AU/60 DAYS.IN THESE UNITS THE EARTH HAS A VELOCITY OF 1.0 .""AT 4AU FROM THE SUN A VELOCITY OF 0.3 WOULD BE A GOOD CHOICE. AL VALUES MIGHT BE X=4,Y=0"! >: H"ENTER X,Y ";X0,Y0b RX10X0:Y10Y0:CONVERT TO SQUARESk \:3 f"X= ";X0;" Y= ";Y0 p8z"THE STARTING VELOCITY OF THE COMET MUST BE GIVEN IN COMPONENT FORM. IF VX=-1 AND VY=1 THEY WOULD REPRESENT F A PLANET,COMET OR SATELLITE THAT IS IN ORBIT AROUND THE SUN."K  "THE STARTING POINT OF THE ORBIT MUST BE GIVEN IN X,Y-COORDINATES IN THE UNITSOF AU WHERE ONE AU IS THE AVERAGE DISTANCE BETWEEN THE EARTH AND SUN." * 4"TYPIC$;RR;A$;VR;A$;A0! xX9(16384)2 X92162840D XX$"S"ľQQ$V QQ$"X"2840` 1170f : : START OF PROGRAM : 2040 2050 "********* ORBIT OFF SCREEN *********":2850 :5E "THIS PROGRAM COMPUTES THE ORBIT O(YX)K1) X0A0A01804 X0Y0A0A0360L A$" ": 3 SPACES^ **ROUNDING**s (XR(XK2K4)K2 2YR(YK2K4)K2 <RR(RK2K4)K2 FVR(VK3K4)K3 P23 Z" " d23 nXR;A$;YR;A IDTTDT R(XXYY)/ FLAG01210O AXKXRRR:AYKYRRRk VXAXDTVX:VYAYDTVY XVXDTX:YVYDTY FLAG1  K5XK6,K7(K5Y) V(VXVXVYVY)6 X0Y0A090:1300 X0Y0A0270:1300 A0(u  ORBIT 4.0 1-7-86!+2000YLK1036:FOR X,Y IN SQUARES; TIME IN DAYSbV:3XK11803.1415926:K2100:K31000:K40.5:K52:K6139:K790`139,90j2X139,90(2Y)t21~" X - Y - R - V - THETA (X=STOP)"      * *,* BORROWED FROM *D* BHS ROOM 205 *\* *t******************' "TYPE 1 TO CONTINUE, 0 TO QUIT ";.RG R1ī100: NEW GAME*"GAME OVER P1= ";P1;" P2= ";P2: TOTAL SCORE4 P2P21: COUNT GAMES WON&MD(MM)m"MISS= ";(((MD.005)100))100;" RED = ";P1;" BLUE = ";P2S16336: SPEAKER SOUND EFFECTS FOR WINNERBEEP1100SOUND(S)(S)(S)(S)(S)(S) BEEP  CHECK FOR A NEW GAMETV(E)Y0* FINE TUNE HITTING7S1XLXTDS2YLYTPS3XXL\S4YYLmAAS12S22~BBS32S42ABS1S3S2S4"MM(AAAB2BB),MMRRī20006 WE HAVE A HITF02040P1P11:20452050LLOW.... TERRAIN FUNCTIONSYC1(((C2Z)22))C3(Z(Z))(Z).3333C4Ys PLOT GUN PLACEMENTSX,Y3X,Y4X1,Y3X1,Y4X1,Y3X1,Y4 TRAJECTORY EQUATIONSXTV(E)X0KDVW(VW)T2 Y.5GT2 MM(XX1)2(YY1)2/MMRRī2000: HITmX140MM225İ1500: FINE TUNE HITTING RADIUS FOR A HIT.| ZX140.01*900: GET Y4YMY159>YPYM420: BACK TO PLAYER NO. 1H722: FINISH #2 TRAJECTORYRW SUBROUTINES NOW FOV0ijV1100!V9130/E2E:V2VBE(180E)57.3MX2,Y2YRRR22iXTX1:YTY1xXX2:YPY2X0X2:Y0Y2T.2:DT.2TTDTXLX:YLYP1000Y0840X0X279420Y190420YPYX,YHAVE A HIT OR NOT.!ZX140.012900: GET Y@YMY159PYPYMī650o:462: FINISH TRAJECTORY 1u"NO.2 INPUT E,V. LAST (E,V) = ";E2;",";V2"WIND VELOCITY = ";(VW)6: DIFFERENT COLOR FOR PLAYER #2F0E,VXLX:YLYP8 1000: PARAMETRIC EQUATIONS FOR X AND YF Y0ī570Y X0X279650h Y190650q YPY{ X,Y MM(XX2)2(YY2)2 MMRRī2000: HIT X140MM225İ1500 SUB. 1500 FINE TUNES THE HITTING RADIUS TO SEE IF WE 130: CLEAR SCREEN AND RE-DRAW TERRAINF V1ī100: START GAME OVERt E1E:V1V: REMEMBER LAST USED PARAMETERS EE57.3 X1,Y1: FIRST DOT OF TRAJECTORY RRR12 X0X1:Y0Y1 XTX2:YTY2 XX1:YPY1 T.2:DT.2 TTDT  ZX2140.01 XX2! 900. "YY1597 'Y2YL ,950: DRAW GUNS` ^I115:" ":Io F.5ī650u  "NO.1 INPUT E,V. LAST (E,V) = ";E1;",";V1 "WIND VELOCITY = ";(VW) 5 F1 E,V V0ij: END OF GAME& V9ī1 900: Y VALUE! YY1595 Y10Y190100? X,YF XL _ LOCATE FORTSe t V9ī225 X11129(1) ZX1140.01 XX1 900: GET Y YY159 Y1Y 950: DRAW GUNS V9ī260 X2278128(11)0:V10:E20:V20 pF(1)0 sVW60120(1)@ xC1110(1)P zC2.15(1)c |C31326(1)u ~C43030(1) DRAW TERRAIN :3: WHITE X1 ZX140.01 900 YY159 Y10Y190100 X,Y X22795 ZX140.0  SHOOT OUT/ HI-RES ARTILLERY GAMEP WRITTEN BY DON VAN WINKLEo( ENTERED BY SUSAN MANUEL2 ESU#3, OMAHA, NE.<:F10:"TYPE IN A NUMBER FROM 1 TO 100 ";NRKJ1NR:S(1):JZR12:R22dG32.2hKD.001 nE1     " ,I0N2) @AIDT(P(I)P(I1))27 TTATAAIO ^5)I120)AI31)TAV hIq |:"TOTAL AREA = ";TAw : : HOT DOG AREA : 4/28/86 : Robert McClellandZ AFTER ONE DELTA T"? ::" PRESS ANY KEY TO CONTINUE":Z$V N0:TA0:P(50):n "DELTA T = ? ";DT " ENTER -1 TO STOP" "ENTER P("N") ";:P(N) P(N)0NN1:260 ":"TRAPEZOID NO."19)"AREA"28)"SUB TOTAL :(4)7"THIS PROGRAM IS DESIGNED TO BE USED"d"DURING THE 'ELECTRIC HOT DOG' PHYSICS"}"LAB EXPERIMENT. ":"DEFINITIONS:" DELTA T = THE TIME BETWEEN READINGS"" P(0) = 0 , THE POWER AT T=0" " P(1) = POWER  *$* WRITTEN BY *?* ROBERT MCCLELLAND *Z* BEATRICE, NE. *u* 1985 ** **********************D**. TIME DISTANCE SPEED* $" 3. ROCKET"> ." 4. CANNON"Q 8" 5. ORBIT"] B" 6."i L" 7."u V" 8." `" 9." j" 10." t" 11." ~" 12." " 13." " 14."  "CHOOSE ONE OF THE ABOVE BY NUMBER: ";N  D CANNON" D$"RUN ORBIT"S JD$"CATALOG"::"PRESS RETURN TO CONTINUE";AA$:130Y T_ f 4 " PHYSICS MENU -- B. H. S."  " R. McClelland" " Instructor"  " 1. SPEED UNITS CONVERSION" " 2 d HELLOn*xD$(4):CONTROL-D:1000:MENUMN13N5ī130`N1N12ī130N210,220,230,240,250,260,270,280,290,300,310,320,330,340D$"RUN SPEED UNITS CONVERSION"D$"RUN TIME DIST SPEED"D$"RUN ROCKET" D$"RUN  AND *# * 9 - 18 - 83 *? * *[ **********************D NUMBERS? Y/N" Z$& Z$"Y"30; :D$"RUN HELLO"A h JL01:L(J),255:L(J)1,255:J{ 61800,61970: ********************** * * * TIME DIST SPEED * * * * BY R MCCLELL1000 VATVI* VR(1000V.5)1000C TR(1000T.5)1000Q TR,DR,VR\ TTDTb h "DO YOU WISH TO CONTINUE LISTING FOR" "MORE TIMES? Y/N " Z$ Z$"Y"100 :"WOULD YOU LIKE TO RUN ANOTHER SET " "OFE FOR DISTANCE: "; BDIj C:"A DATA TABLE WILL BE PRINTED.":"GIVE FIRST TIME TO BE LISTED IN TABLE"q DT F:"CHANGE IN TIME (DELTA T):"; PDT _ d"TIME","DISTANCE";33);"SPEED" xITT9 |DT(.5ATVI)DI ~DR(1000D.5)]  :5!D$(4):CONTROL-DH"THIS PROGRAM WILL CALCULATE THE"t"POSITION AND SPEED OF AN OBJECT THAT""MOVES WITH CONSTANT ACCELERATION":"ENTER ACCELERATION: ";(A2:"ENTER INITIAL SPEED: ";<VI @:"STARTING VALU